home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / wb / czesc_2 / iconextras / rexx / makepinkdrawer.rexx < prev   
OS/2 REXX Batch file  |  1995-01-13  |  322b  |  9 lines
  1. /* Make Pink Drawer */
  2. parse arg filename
  3. address command
  4. filename=strip(filename,'B','"')   /* remove quotes */
  5. filename=strip(filename)           /* remove spaces */
  6. filename=strip(filename,'T','/')   /* Finally, remove trailing slash */
  7. 'copyicon' "env:sys/drawer_pink.info" """"filename".info""" /* add quotes */
  8. exit
  9.